program UniServer;

uses
  Vcl.Forms,
  Server in 'Server.pas' {frmServer},
  DM in 'DM.pas' {dtmdlUni: TDataModule},
  RunStat in 'RunStat.pas',
  SrvDataOperate in 'SrvDataOperate.pas' {kbmqrysrvDataOperate1: TkbmMWQueryService},
  SrvFunOperate in 'SrvFunOperate.pas' {kbmssrvFunOperate: TkbmMWSimpleService},
  CommonObj in '..\Common\CommonObj.pas',
  MahStringBuilder in 'MahStringBuilder.pas',
  UUniQueryPool in 'UUniQueryPool.pas',
  UkbmMemTablePool in 'UkbmMemTablePool.pas',
  UkbmMWBinaryStreamFormatPool in 'UkbmMWBinaryStreamFormatPool.pas',
  HttpService in 'HttpService.pas' {kbmMWHttpService: TkbmMWCustomHTTPService};

{$R *.res}

begin
  Application.Initialize;
  Application.MainFormOnTaskbar := True;
  Application.CreateForm(TfrmServer, frmServer);
  Application.CreateForm(TdtmdlUni, dtmdlUni);
  Application.Run;
end.
